object NewJournal: TNewJournal Left = 257 Top = 61 BorderStyle = bsDialog Caption = 'New Journal Entry' ClientHeight = 326 ClientWidth = 421 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter TextHeight = 16 object Label99: TLabel Left = 8 Top = 56 Width = 86 Height = 19 Alignment = taRightJustify AutoSize = False Caption = 'Title:' Font.Color = clBlue Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Label2: TLabel Left = 144 Top = 16 Width = 41 Height = 19 Alignment = taRightJustify Caption = 'Date:' Font.Color = clBlue Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Title: TEdit Left = 96 Top = 48 Width = 201 Height = 26 Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 1 end object Remarks: TMemo Left = 8 Top = 88 Width = 289 Height = 217 ScrollBars = ssVertical TabOrder = 2 end object JDate: TMaskEdit Left = 192 Top = 8 Width = 105 Height = 26 EditMask = '!99-99-00;1;_' Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [] MaxLength = 8 ParentFont = False TabOrder = 0 Text = ' - - ' end object OKBtn: TBitBtn Left = 320 Top = 232 Width = 93 Height = 31 Caption = 'Ok' Default = True Font.Color = clGreen Font.Height = -19 Font.Name = 'Arial' Font.Style = [fsBold] ModalResult = 1 ParentFont = False TabOrder = 3 Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000CE0E0000D80E00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555 5555555555555555555555555205555555555555222055555555555522205555 5555555222220555555555222222055555555722052220555555720555522055 5555555555522205555555555555220555555555555552205555555555555572 0555555555555557205555555555555552205555555555555555} Margin = 8 Spacing = -1 end object CancelBtn: TBitBtn Left = 321 Top = 275 Width = 93 Height = 31 Font.Color = clRed Font.Height = -19 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False TabOrder = 4 Kind = bkCancel Margin = 2 Spacing = -1 end object HelpBtn: TBitBtn Left = 381 Top = 91 Width = 25 Height = 31 Caption = ' ' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 5 OnClick = HelpBtnClick Kind = bkHelp Margin = 2 Spacing = -1 end end